home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / vol7n8.arc / WARMBOOT.BAS < prev   
BASIC Source File  |  1988-04-26  |  980b  |  22 lines
  1. 10 ' Machine language warm reboot procedure
  2. 20 DEFINT A-Z: P=0: I=0: J=0: DIM ARRAY(7)
  3. 30 DATA &HB8              :REM This is the hex code
  4. 40 DATA &H40              :REM for the warm reboot.
  5. 50 DATA &H00              :REM It first goes to the
  6. 60 DATA &H8E              :REM memory address 0040
  7. 70 DATA &HD8              :REM and places 1234 (hex)
  8. 80 DATA &HC7              :REM into memory.  Then it
  9. 90 DATA &H06              :REM branches to FFFF:0000,
  10. 100 DATA &H72             :REM the address where the
  11. 110 DATA &H00             :REM CPU begins to execute
  12. 120 DATA &H34             :REM instructions after a
  13. 130 DATA &H12             :REM power on.  From here
  14. 140 DATA &HEA             :REM the PC's BIOS jumps
  15. 150 DATA &H00             :REM to the start of its
  16. 160 DATA &H00             :REM diagnostic routines.
  17. 170 DATA &HFF
  18. 180 DATA &HFF
  19. 190 REM
  20. 200 P=VARPTR(ARRAY(0)): FOR I=0 TO 15: READ J: POKE(P+I), J: NEXT
  21. 210 SUBRT=VARPTR(ARRAY(0)): CALL SUBRT
  22.